home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1998 #4 / Amiga Plus CD - 1998 - No. 4.iso / pd / tools / backclock / install next >
Text File  |  1998-02-08  |  2KB  |  76 lines
  1. (set #inst_text "BackClock Installation on Hard Disk")
  2. (set #prog "backclock.")
  3. (set @minuser "Intermediate")
  4. (set @appname "BackClock")
  5. (set @user-level 2)
  6.  
  7.  
  8. (set #destdir_prompt "Where do you want to install BackClock\nA drawer will be created.")
  9.  
  10. (set #destdir
  11.   (askdir
  12.     (prompt #destdir_prompt)
  13.     (help @askdir-help)
  14.     (default "Work:")
  15.   )
  16. )
  17.  
  18. (set #choice
  19.   (askchoice
  20.     (prompt "What type of CPU do you have ?")
  21.     (help   "Select with the gadget what type of "
  22.             "microprocessor you have.")
  23.     (choices
  24.       "68020"
  25.       "68030 + 68882"
  26.       "68040"
  27.       "68060"
  28.     )
  29.   )
  30. )
  31. (select #choice
  32.   (set #prog (cat #prog "020"))
  33.   (set #prog (cat #prog "030"))
  34.   (set #prog (cat #prog "040"))
  35.   (set #prog (cat #prog "060"))
  36. )
  37. (set @default-dest (tackon #destdir "BackClock"))
  38. (if (not (exists (@default-dest)))
  39.   (makedir @default-dest (infos))
  40. )
  41. (if (not (exists (tackon @default-dest "sources")))
  42.   (makedir (tackon @default-dest "sources"))
  43. )
  44.  
  45. (copyfiles
  46.   (prompt "Copying main files")
  47.   (help   "Copy the executable files ant its icon")
  48.   (source (tackon "bin/" #prog))
  49.   (dest   @default-dest)
  50.   (newname "BackClock")
  51. )
  52.  
  53. (copyfiles
  54.   (prompt "Copying Icon of the main file")
  55.   (help   "Copy the icon of the maon file in the path you choosed")
  56.   (source "bin/backclock.info")
  57.   (dest   @default-dest)
  58. )
  59.  
  60. (copyfiles
  61.   (prompt "Cpying documentation")
  62.   (help   "Copy the documentation in the path you choosed")
  63.   (source "docs/backclock.guide")
  64.   (dest   @default-dest)
  65.   (infos)
  66. )
  67.  
  68. (copyfiles
  69.   (prompt "Copying sources")
  70.   (help   "Copy the sources in C in the the path you choosed")
  71.   (source "sources/")
  72.   (dest   (tackon @default-dest "sources"))
  73.   (all)
  74. )
  75.  
  76.